Language/OS - Multiplatform Resource Library/LANGUAGE OS.iso/lisp/eulisp/comp0_89.lha/Feel/Boot/Compiler/scan-args.sc

Text File | 1993-07-16 | 2KB | 1 lines

(dependencies (eulisp0) names (scan-args) length 382 nslots 3 code ((36 (%%-big-arg-%% 17)) (5 (%%-big-arg-%% 0)) (3 0) (31 (%%-big-arg-%% 130)) (17 1) (36 (%%-big-arg-%% 27)) (5 (%%-big-arg-%% 0)) (4 (%%-static-%% . 3)) (46) (1 (%%-link-me-%% boot . make-installed-module)) (34 2) (36 (%%-big-arg-%% 60)) (5 (%%-big-arg-%% 0)) (8 3) (4 (%%-static-%% . 1)) (5 (%%-me-local--%% . fold-initargs)) (3 0) (39) (8 0) (5 (%%-me-local--%% . map-initargs)) (3 0) (39) (28 1) (5 (%%-me-local--%% . scan-args)) (3 0) (39) (28 1) (17 1) (1 (%%-link-me-%% boot . install-local-bindings)) (34 3) (17 1) (36 (%%-big-arg-%% 28)) (5 (%%-big-arg-%% 1)) (8 3) (4 (%%-static-%% . 2)) (1 (%%-link-me-%% boot . make-interface)) (34 2) (17 1) (14 2 1) (37) (22 0) (36 (%%-big-arg-%% 183)) (11) (4 (%%-static-%% . 0)) (5 (%%-big-arg-%% 0)) (39) (51 3) (7 (%%-me-local--%% . scan-args)) (36 (%%-big-arg-%% 102)) (11) (4 (%%-static-%% . 0)) (6 1) (39) (51 2) (7 (%%-me-local--%% . map-initargs)) (36 (%%-big-arg-%% 25)) (11) (4 (%%-static-%% . 0)) (6 2) (39) (51 3) (7 (%%-me-local--%% . fold-initargs)) (18) (3 1) (37) (11) (42) (32 (%%-big-arg-%% 10)) (17 4) (3 0) (37) (4 (%%-me-local--%% . fold-initargs)) (8 4) (8 4) (27) (27) (36 (%%-big-arg-%% 18)) (12) (8 8) (26) (8 9) (27) (26) (8 9) (12) (33 3) (12) (14 9 4) (9) (13 5) (18) (3 0) (31 (%%-big-arg-%% -51)) (10) (42) (32 (%%-big-arg-%% 10)) (17 3) (3 0) (37) (36 (%%-big-arg-%% 17)) (8 4) (8 4) (26) (8 5) (27) (26) (11) (33 2) (36 (%%-big-arg-%% 23)) (4 (%%-me-local--%% . map-initargs)) (8 6) (8 6) (27) (27) (3 0) (31 (%%-big-arg-%% -47)) (14 5 2) (39) (37) (11) (42) (32 (%%-big-arg-%% 9)) (18) (15 3) (37) (11) (26) (8 4) (43) (32 (%%-big-arg-%% 11)) (11) (27) (15 5) (26) (37) (4 (%%-me-local--%% . scan-args)) (8 4) (8 4) (27) (27) (8 4) (12) (14 9 4) (9) (13 5) (18) (3 0) (31 (%%-big-arg-%% -50))) statics (scan-args (fold-initargs map-initargs scan-args) ((strip (union (except (scan-args) (union (import eulisp0))))) fold-initargs map-initargs scan-args) scan-args))